home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 3
/
ct-rom iiib.zip
/
ct-rom iiib
/
WINDOWS
/
DIVERSEN
/
WINE02BX
/
ELISP.12
< prev
next >
Wrap
Text File
|
1993-03-28
|
51KB
|
1,184 lines
Info file elisp, produced by Makeinfo, -*- Text -*- from input file
elisp.texi.
This file documents GNU Emacs Lisp.
This is edition 1.03 of the GNU Emacs Lisp Reference Manual, for
Emacs Version 18.
Published by the Free Software Foundation, 675 Massachusetts
Avenue, Cambridge, MA 02139 USA
Copyright (C) 1990 Free Software Foundation, Inc.
Permission is granted to make and distribute verbatim copies of
this manual provided the copyright notice and this permission notice
are preserved on all copies.
Permission is granted to copy and distribute modified versions of
this manual under the conditions for verbatim copying, provided that
the entire resulting derived work is distributed under the terms of a
permission notice identical to this one.
Permission is granted to copy and distribute translations of this
manual into another language, under the above conditions for modified
versions, except that this permission notice may be stated in a
translation approved by the Foundation.
File: elisp, Node: Key Lookup, Next: Functions for Key Lookup, Prev: Creating Keymaps, Up: Keymaps
Key Lookup
==========
"Key lookup" is the process of finding the binding of a key
sequence from a given keymap. Actual execution of the definition is
not part of key lookup.
When the key sequence consists of multiple characters, the
characters are handled sequentially: the binding of the first
character is found, and must be a keymap; then the second character's
binding is found in that keymap, and so on until all the characters
in the key sequence are used up. (The binding thus found for the
last character may or may not be a keymap.) Thus, the process of key
lookup is defined in terms of a simpler process for looking up a
single character in a keymap. How this is done depends on the type
of object associated with the character in that keymap.
The value directly associated with a character in a keymap is
called a "keymap entry". While any Lisp object may be stored in a
keymap entry, only a few types of object make sense for key lookup.
Here is a list of them, and what they mean:
`nil'
`nil' means that the characters used so far in the lookup form
an undefined key. When a sparse keymap fails to mention a
character, that is equivalent to an entry of `nil'.
KEYMAP
The characters used so far in the lookup form a prefix key. The
next character of the key sequence is looked up in KEYMAP, which
may be full or sparse.
COMMAND
The characters used so far in the lookup form a complete key,
and COMMAND is its definition.
STRING
STRING represents a keyboard macro. The characters used so far
in the lookup form a complete key, and STRING is its definition.
(See *Note Keyboard Macros::, for more information.)
LIST
The meaning of a list depends on the types of the elements of
the list.
* If the CAR of LIST is the symbol `keymap', then the list is
a sparse keymap, and is treated as a keymap (see above).
* If the CAR of LIST is `lambda', then the list is a lambda
expression. This is presumed to be a command, and is
treated as such (see above).
* If the CAR of LIST is a keymap and the CDR is a character,
then this entry is an indirection to a slot in the other
keymap. When an indirect entry is found in key lookup, it
is immediately replaced by the entry in the specified
keymap for the specified character. This permits you to
define one key as an alias for another key. For example,
an entry whose CAR is the keymap called `esc-map' and whose
CDR is 32 (the code for space) means, "Use the global
definition of `Meta-SPC', whatever that may be."
SYMBOL
The function definition of SYMBOL is used in place of SYMBOL.
If that too is a symbol, then this process is repeated, any
number of times. Ultimately this should lead to a definition
which is a keymap, a command or a string. A list is allowed if
it is a keymap or a command, but indirect entries are not
understood when found via symbols.
Note that keymaps and strings are not valid functions, so a
symbol with a keymap or string as its function definition is
likewise not valid as a function. It is, however, valid as a
key binding. If the definition is a string, then the symbol is
also valid as an argument to `command-execute' (*note
Interactive Call::.).
The symbol `undefined' is worth special mention: it means to
treat the key as undefined. Strictly speaking, the key is
defined, and its definition is the symbol `undefined', but that
command does the same thing that is done automatically for an
undefined key: it rings the bell (by calling `ding') but does
not signal an error.
`undefined' is used in local keymaps to override a global key
binding and make the key undefined locally. A local binding of
`nil' would fail to do this because it would not override the
global binding.
ANYTHING ELSE
If any other type of object is found, the characters used so far
in the lookup form a complete key, and the object is its
definition.
In short, a keymap entry may be a keymap, a command, a string, a
symbol which leads to one of them, or an indirection or `nil'. Here
is an example of a sparse keymap with two characters bound to
commands and one bound to another keymap. This map is the normal
value of `emacs-lisp-mode-map'. Note that 9 is the code for TAB, 127
for DEL, 27 for ESC, 17 for `C-q' and 24 for `C-x'.
(keymap (9 . lisp-indent-line)
(127 . backward-delete-char-untabify)
(27 keymap (17 . indent-sexp) (24 . eval-defun)))
File: elisp, Node: Functions for Key Lookup, Next: Prefix Keys, Prev: Key Lookup, Up: Keymaps
Functions for Key Lookup
========================
Here are the functions and variables pertaining to key lookup.
* Function: lookup-key KEYMAP KEY
This function returns the definition of KEY in KEYMAP. If the
string KEY is not a valid key sequence according to the prefix
keys specified in KEYMAP (which means it is "too long" and has
extra characters at the end), then the value is a number, the
number of characters at the front of KEY that compose a complete
key.
All the other functions described in this chapter that look up
keys use `lookup-key'.
(lookup-key (current-global-map) "\C-x\C-f")
=> find-file
(lookup-key (current-global-map) "\C-x\C-f12345")
=> 2
If KEY contains a meta-character, that character is implicitly
replaced by a two-character sequence: the value of
`meta-prefix-char', followed by the corresponding non-meta
character. Thus, the first example below is handled by
conversion into the second example.
(lookup-key (current-global-map) "\M-f")
=> forward-word
(lookup-key (current-global-map) "\ef")
=> forward-word
This function does not perform automatic downcasing like that of
`read-key-sequence' (*note Keyboard Input::.).
* Command: undefined
Used in keymaps to undefine keys. It calls `ding', but does not
cause an error.
* Variable: meta-prefix-char
This variable is the meta-prefix character code. It is used
when translating a meta-character to a two-character sequence so
it can be looked up in a keymap. For useful results, the value
should be a prefix character (*note Prefix Keys::.). The
default value is 27, which is the ASCII code for ESC.
As long as the value of `meta-prefix-char' remains 27, key
lookup translates `M-b' into `ESC b', which is normally defined
as the `backward-word' command. However, if you set
`meta-prefix-char' to 24, the code for `C-x', then Emacs will
translate `M-b' into `C-x b', and call the `switch-to-buffer'
command.
meta-prefix-char ; The default value.
=> 27
(key-binding "\M-b")
=> backward-word
?\C-x ; The print representation
=> 24 ; of a character.
(setq meta-prefix-char 24)
=> 24
(key-binding "\M-b")
=> switch-to-buffer ; Now, typing `M-b' is
; like typing `C-x b'.
(setq meta-prefix-char 27) ; Avoid confusion!
=> 27 ; Restore the default value!
File: elisp, Node: Prefix Keys, Next: Global and Local Keymaps, Prev: Functions for Key Lookup, Up: Keymaps
Prefix Keys
===========
A "prefix key" has an associated keymap which defines what to do
with key sequences that start with the prefix key. For example,
`ctl-x-map' is the keymap used for characters following the prefix
key `C-x'. Here is a list of the standard prefix keys of Emacs and
their keymaps:
* `ctl-x-map' is the variable name for the map used for characters
that follow `C-x'. This map is also the function definition of
`Control-X-prefix'.
* `ctl-x-4-map' used is for characters that follow `C-x 4'.
* `esc-map' is used for characters that follow ESC. Thus, the
global definitions of all Meta characters are actually found
here. This map is also the function definition of `ESC-prefix'.
* `help-map' is used for characters that follow `C-h'.
* `mode-specific-map' is for characters that follow `C-c'. This
map is not actually mode specific; its name was chosen to be
informative for the user in `C-h b' (`display-bindings'), where
it describes the main use of the `C-c' prefix key.
The binding of a prefix key is the keymap to use for looking up
the characters that follow the prefix key. (It may instead be a
symbol whose function definition is a keymap. The effect is the
same, but the symbol serves as a name for the prefix key.) Thus, the
binding of `C-x' is the symbol `Control-X-prefix', whose function
definition is the keymap for `C-x' commands. This keymap is also the
value of `ctl-x-map'.
Prefix key definitions of this sort can appear in either the
global map or a local map. The definitions of `C-c', `C-x', `C-h'
and ESC as prefix keys appear in the global map, so these prefix keys
are always available. Major modes can locally redefine a key as a
prefix by putting a prefix key definition for it in the local map.
If a key is defined as a prefix in both the local map and the
global, the two definitions are effectively merged: the commands
defined in the local map's prefix definition take priority; those not
defined there are taken from the global map.
In the following example, `C-p' is made a prefix key in the local
keymap (so that `C-p' is identical to `C-x'). Then the binding for
`C-p C-f' is the function `find-file', just like `C-x C-f'. The key
sequence `C-p 6' is not found in either the local map or global map.
(use-local-map (make-sparse-keymap))
=> nil
(local-set-key "\C-p" ctl-x-map)
=> nil
(key-binding "\C-p\C-f")
=> find-file
(key-binding "\C-p6")
=> nil
* Function: define-prefix-command SYMBOL
This function defines SYMBOL as a prefix command: it creates a
full keymap and stores it as SYMBOL's function definition.
Storing the symbol as the binding of a key makes the key a
prefix key which has a name. This function returns SYMBOL.
It is convenient to store the keymap as the value of a variable
as well. In version 19, this function stores the keymap in both
the function definition and value of SYMBOL. However, in
version 18, only the function definition of SYMBOL is set, not
the value.
File: elisp, Node: Global and Local Keymaps, Next: Changing Key Bindings, Prev: Prefix Keys, Up: Keymaps
Global and Local Keymaps
========================
The "global keymap" holds the bindings of keys that are defined
regardless of the current buffer, such as `C-f'. The variable
`global-map' holds this keymap.
Each buffer may have another keymap, its "local keymap", which may
contain new or overriding definitions for keys. Each buffer records
which local keymap is used with it.
Both the global and local keymaps are used to determine what
command to execute when a key is entered. The key lookup proceeds as
described earlier (*note Key Lookup::.), but Emacs *first* searches
for the key in the local map; if Emacs does not find a local
definition, Emacs then searches the global map.
Since every buffer that uses the same major mode normally uses the
very same local keymap, it may appear as if the keymap is local to
the mode. A change to the local keymap of a buffer (using
`local-set-key', for example) will be seen also in the other buffers
that share that keymap.
The local keymaps that are used for Lisp mode, C mode, and several
other major modes exist even if they have not yet been used. These
local maps are the values of the variables `lisp-mode-map',
`c-mode-map', and so on. For most other modes, which are less
frequently used, the local keymap is constructed only when the mode
is used for the first time in a session.
The minibuffer has local keymaps, too; they contain various
completion and exit commands. *Note Minibuffers::.
*Note Standard Keymaps::, for a list of standard keymaps.
* Variable: global-map
This variable contains the default global keymap that maps Emacs
keyboard input to commands. Normally this keymap is the global
keymap. The default global keymap is a full keymap that binds
`self-insert-command' to all of the printing characters.
* Function: current-global-map
This function returns the current global keymap. Normally, this
is the same as the value of the `global-map'.
(current-global-map)
=> [set-mark-command beginning-of-line ... delete-backward-char]
* Function: current-local-map
This function returns the current buffer's local keymap, or
`nil' if it has none. In the following example, the keymap for
the `*scratch*' buffer (using Lisp Interaction mode) is a sparse
keymap in which the entry for ESC, ASCII code 27, is another
sparse keymap.
(current-local-map)
=> (keymap
(10 . eval-print-last-sexp)
(9 . lisp-indent-line)
(127 . backward-delete-char-untabify)
(27 keymap
(24 . eval-defun)
(17 . indent-sexp)))
* Function: use-global-map KEYMAP
This function makes KEYMAP the new current global keymap. The
KEYMAP map must be a full keymap (a vector of length 128). It
returns `nil'.
It is very unusual to change the global keymap.
* Function: use-local-map KEYMAP
This function makes KEYMAP the new current local keymap of the
current buffer. If KEYMAP is `nil', then there will be no local
keymap. It returns `nil'. Most major modes use this function.
* Function: key-binding KEY
This function returns the definition for KEY in the current
keymaps trying the current buffer's local map and then the
global map. The result is `nil' if KEY is undefined in the
keymaps.
An error is signaled if KEY is not a string.
(key-binding "\C-x\C-f")
=> find-file
* Function: local-key-binding KEY
This function returns the definition for KEY in the current
local keymap, or `nil' if it is undefined there.
* Function: global-key-binding KEY
This function returns the definition for command KEY in the
current global keymap, or `nil' if it is undefined there.
File: elisp, Node: Changing Key Bindings, Next: Key Binding Commands, Prev: Global and Local Keymaps, Up: Keymaps
Changing Key Bindings
=====================
The way to rebind a key is to change its entry in a keymap. You
can change the global keymap, so that the change is effective in all
buffers (except those that override the global definition with a
local one). Or you can change the current buffer's local map, which
usually affects all buffers using the same major mode. The
`global-set-key' and `local-set-key' functions are convenient
interfaces for these operations. Or you can change bindings in any
map by specifying it explicitly in `define-key'.
People often use `global-set-key' in their `.emacs' file for
simple customization. For example,
(global-set-key "\C-x\C-\\" 'next-line)
redefines `C-x C-\' to move down a line.
In writing the string for the key sequence to rebind, it is useful
to use the special escape sequences for control and meta characters
(*note String Type::.). In a string, the syntax `\C-' means that the
following character is a control character and `\M-' means that the
following character is a META character. Thus, the string `"\M-x"'
is read as containing a single `M-x', `"\C-f"' is read as containing
a single `C-f', and `"\M-\C-x"' and `"\C-\M-x"' are both read as
containing a single `C-M-x'.
For the functions below, an error is signaled if KEYMAP is not a
keymap or if KEY is not a string representing a key sequence.
* Function: define-key KEYMAP KEY DEFINITION
This function sets the binding for KEY in KEYMAP. (If KEY is
more than one character long, the change is actually made in
another keymap reached from KEYMAP.) The argument DEFINITION
can be any Lisp object, but only certain types are meaningful.
(For a list of meaningful types, see *Note Key Lookup::.) The
value returned by `define-key' is DEFINITION.
Every prefix of KEY must be a prefix key (i.e., bound to a
keymap) or undefined; otherwise an error is signaled (with data
`(error "Key sequence KEY uses invalid prefix characters")').
If some prefix of KEY is undefined, then `define-key' defines it
as a prefix key so that the rest of KEY may be defined as
specified.
In the following example, a sparse keymap is created and a
number of bindings are added to it.
(setq map (make-sparse-keymap))
=> (keymap)
(define-key map "\C-f" 'forward-char)
=> forward-char
map
=> (keymap (6 . forward-char))
;; Build sparse submap for `C-x' and bind `f' in that.
(define-key map "\C-xf" 'forward-word)
=> forward-word
map
=> (keymap
(24 keymap ; `C-x'
(102 . forward-word)) ; `f'
(6 . forward-char)) ; `C-f'
;; Bind `C-p' to the `ctl-x-map'.
(define-key map "\C-p" ctl-x-map)
=> [nil ... find-file ... backward-kill-sentence] ; `ctl-x-map'
;; Bind `C-f' to `foo' in the `ctl-x-map'.
(define-key map "\C-p\C-f" 'foo)
=> 'foo
map
=> (keymap ; Note `foo' in `ctl-x-map'.
(16 . [nil ... foo ... backward-kill-sentence])
(24 keymap
(102 . forward-word))
(6 . forward-char))
Note that storing a new binding for `C-p C-f' actually works by
changing an entry in `ctl-x-map', and this has the effect of
changing the bindings of both `C-p C-f' and `C-x C-f' in the
default global map.
* Function: substitute-key-definition OLDDEF NEWDEF KEYMAP
This function replaces OLDDEF with NEWDEF for any keys in KEYMAP
that were bound to OLDDEF. In other words, OLDDEF is replaced
with NEWDEF wherever it appears. It returns `nil'.
Prefix keymaps that appear within KEYMAP are not checked
recursively for keys bound to OLDDEF; they are not changed at all.
Perhaps it would be better to check nested keymaps recursively.
(setq map '(keymap
(?1 . olddef-1)
(?2 . olddef-2)
(?3 . olddef-1)))
=> (keymap (49 . olddef-1) (50 . olddef-2) (51 . olddef-1))
(substitute-key-definition 'olddef-1 'newdef map)
=> nil
map
=> (keymap (49 . newdef) (50 . olddef-2) (51 . newdef))
;; The following will redefine `C-x C-f', if you do it in an
;; Emacs with standard bindings.
(substitute-key-definition
'find-file 'find-file-read-only (current-global-map))
* Function: suppress-keymap KEYMAP &optional NODIGITS
This function changes the contents of the full keymap KEYMAP by
replacing the self-insertion commands for numbers with the
`digit-argument' function, unless NODIGITS is non-`nil', and by
replacing the functions for the rest of the printing characters
with `undefined'. This means that ordinary insertion of text is
impossible in a buffer with a local keymap on which
`suppress-keymap' has been called.
`suppress-keymap' returns `nil'.
The `suppress-keymap' function does not make it impossible to
modify a buffer, as it does not suppress commands such as `yank'
and `quote-insert'. To prevent any modification of a buffer,
make it read-only (*note Read Only Buffers::.).
Since this function modifies KEYMAP, you would normally use it
on a newly created keymap. Operating on an existing keymap that
is used for some other purpose is likely to cause trouble; for
example, suppressing `global-map' would make it impossible to
use most of Emacs.
Most often, `suppress-keymap' is used for initializing local
keymaps of modes such as Rmail and Dired where insertion of text
is not desirable and the buffer is read-only. Here is an
example taken from the file `emacs/lisp/dired.el', showing how
the local keymap for Dired mode is set up:
...
(setq dired-mode-map (make-keymap))
(suppress-keymap dired-mode-map)
(define-key dired-mode-map "r" 'dired-rename-file)
(define-key dired-mode-map "\C-d" 'dired-flag-file-deleted)
(define-key dired-mode-map "d" 'dired-flag-file-deleted)
(define-key dired-mode-map "v" 'dired-view-file)
(define-key dired-mode-map "e" 'dired-find-file)
(define-key dired-mode-map "f" 'dired-find-file)
...
File: elisp, Node: Key Binding Commands, Next: Scanning Keymaps, Prev: Changing Key Bindings, Up: Keymaps
Commands for Binding Keys
=========================
This section describes some convenient interactive interfaces for
changing key bindings. They work by calling `define-key'.
* Command: global-set-key KEY DEFINITION
This function sets the binding of KEY in the current global map
to DEFINITION.
(global-set-key KEY DEFINITION)
==
(define-key (current-global-map) KEY DEFINITION)
* Command: global-unset-key KEY
This function removes the binding of KEY from the current global
map.
One use of this function is in preparation for defining a longer
key which uses it implicitly as a prefix--which would not be
allowed otherwise. For example:
(global-unset-key "\C-l")
=> nil
(global-set-key "\C-l\C-l" 'redraw-display)
=> nil
This function is implemented simply using `define-key':
(global-unset-key KEY)
==
(define-key (current-global-map) KEY nil)
* Command: local-set-key KEY DEFINITION
This function sets the binding of KEY in the current local
keymap to DEFINITION.
(local-set-key KEY DEFINITION)
==
(define-key (current-local-map) KEY DEFINITION)
* Command: local-unset-key KEY
This function removes the binding of KEY from the current local
map.
(local-unset-key KEY)
==
(define-key (current-local-map) KEY nil)
File: elisp, Node: Scanning Keymaps, Prev: Key Binding Commands, Up: Keymaps
Scanning Keymaps
================
This section describes functions used to scan all the current
keymaps for the sake of printing help information.
* Function: accessible-keymaps KEYMAP
This function returns a list of all the keymaps that can be
accessed (via prefix keys) from KEYMAP. The list returned is an
association list with elements of the form `(KEY . MAP)', where
KEY is a prefix whose definition in KEYMAP is MAP.
The elements of the alist are ordered so that the KEY increases
in length. The first element is always `("" . KEYMAP)', because
the specified keymap is accessible from itself with a prefix of
no characters.
In the example below, the returned alist indicates that the key
ESC, which is displayed as `"^["', is a prefix key whose
definition is the sparse keymap `(keymap (83 . center-paragraph)
(115 . foo))'.
(accessible-keymaps (current-local-map))
=>(("" keymap
(27 keymap ; Note this keymap for ESC is repeated below.
(83 . center-paragraph)
(115 . center-line))
(9 . tab-to-tab-stop))
("^[" keymap
(83 . center-paragraph)
(115 . foo)))
In the following example, `C-h' is a prefix key that uses a
sparse keymap starting `(118 . describe-variable) ...'. Another
prefix, `C-x 4', uses the full keymap beginning `[nil ...]'
(which happens to be `ctl-x-4-map').
(accessible-keymaps (current-global-map))
=> (("" . [set-mark-command beginning-of-line ...
delete-backward-char])
("^C" keymap (13 . x-flush-mouse-queue))
("^H" keymap (118 . describe-variable) ... (8 . help-for-help))
("^X" . [x-flush-mouse-queue ... backward-kill-sentence])
("^[" . [mark-sexp backward-sexp ... backward-kill-word])
("^X4" . [nil ... find-file-other-window nil ... nil nil]))
* Function: where-is-internal COMMAND &optional KEYMAP FIRSTONLY
This function returns a list of key sequences (of any length)
that are bound to COMMAND in KEYMAP and the global keymap. The
argument COMMAND can be any object; it is compared with all
keymap entries using `eq'. If KEYMAP is not supplied, then the
global map alone is used.
If FIRSTONLY is non-`nil', then the value is a single string
representing the first key sequence found, rather than a list of
all possible key sequences.
This function is used by `where-is' (*note : (emacs)Help.).
(where-is-internal 'describe-function)
=> ("\^hf" "\^hd")
* Command: describe-bindings
This function creates a listing of all defined keys, and their
definitions. The listing is put in a buffer named `*Help*',
which is then displayed in a window.
A meta character is shown as ESC followed by the corresponding
non-meta character. Control characters are indicated with `C-'.
When several consecutive characters have the same definition,
they are shown together, as `FIRSTCHAR..LASTCHAR'. In this
instance, you need to know the ASCII codes to understand which
characters this means. For example, in the default global map,
the characters `SPC .. ~' are described by a single line. SPC
is ASCII 32, `~' is ASCII 126, and the characters between them
include all the normal printing characters, (e.g., letters,
digits, punctuation, etc.); all these characters are bound to
`self-insert-command'.
File: elisp, Node: Modes, Next: Documentation, Prev: Keymaps, Up: Top
Major and Minor Modes
*********************
A "mode" is a set of definitions that customize Emacs and can be
turned on and off while you edit. There are two varieties of modes:
"major modes", which are mutually exclusive and used for editing
particular kinds of text, and "minor modes", which provide features
that may be enabled individually.
This chapter covers both major and minor modes, the way they are
indicated in the mode line, and how they run hooks supplied by the
user. Related topics such as keymaps and syntax tables are covered
in separate chapters. (*Note Keymaps::, and *Note Syntax Tables::.)
* Menu:
* Major Modes:: Defining major modes.
* Minor Modes:: Defining minor modes.
* Mode Line Format:: Customizing the text that appears in the mode line.
* Hooks:: How to use hooks; how to write code that provides hooks.
File: elisp, Node: Major Modes, Next: Minor Modes, Prev: Modes, Up: Modes
Major Modes
===========
Major modes specialize Emacs for editing particular kinds of text.
Each buffer has only one major mode at a time.
The least specialized major mode is called "Fundamental mode".
This mode has no mode-specific definitions or variable settings, so
each Emacs command behaves in its default manner, and each option is
in its default state. All other major modes redefine various keys
and options. For example, Lisp Interaction mode provides special key
bindings for LFD (`eval-print-last-sexp'), TAB (`lisp-indent-line'),
and other keys.
When you need to write several editing commands to help you
perform a specialized editing task, creating a new major mode is
usually a good idea. In practice, writing a major mode is easy (in
sharp contrast to writing a minor mode, which is often difficult).
If the new mode is similar to an old one, it is often unwise to
modify the old one to serve two purposes, since it may become harder
to use and maintain. Instead, copy and rename an existing major mode
definition and alter it for its new function. For example, Rmail
Edit mode, which is in `emacs/lisp/rmailedit.el', is a major mode
that is very similar to Text mode except that it provides three
additional commands. Its definition is distinct from that of Text
mode, but was derived from it.
Rmail Edit mode is an example of a case where one piece of text is
put temporarily into a different major mode so it can be edited in a
different way (with ordinary Emacs commands rather than Rmail). In
such cases, the temporary major mode usually has a command to switch
back to the buffer's usual mode (Rmail mode, in this case). You
might be tempted to present the temporary redefinitions inside a
recursive edit and restore the usual ones when the user exits; but
this is a bad idea because it constrains the user's options when it
is done in more than one buffer: recursive edits must be exited
most-recently-entered first. Using alternative major modes avoids
this limitation. *Note Recursive Editing::.
The standard GNU Emacs Lisp library directory contains the code
for several major modes, in files including `text-mode.el',
`texinfo.el', `lisp-mode.el', `c-mode.el', and `rmail.el'. You can
look at these libraries to see how modes are written. Text mode is
perhaps the simplest major mode aside from Fundamental mode. Rmail
mode is a rather complicated, full-featured mode.
* Menu:
* Major Mode Conventions:: Coding conventions for keymaps, etc.
* Example Major Modes:: Text mode and Lisp modes.
* Auto Major Mode:: How Emacs chooses the major mode automatically.
* Mode Help:: Finding out how to use a mode.
File: elisp, Node: Major Mode Conventions, Next: Example Major Modes, Prev: Major Modes, Up: Major Modes
Major Mode Conventions
----------------------
The code for existing major modes follows various coding
conventions, including conventions for local keymap and syntax table
initialization, global names, and hooks. Please keep these
conventions in mind when you create a new major mode:
* Define a command whose name ends in `-mode', with no arguments,
that switches to the new mode in the current buffer. This
command should set up the keymap, syntax table, and local
variables in an existing buffer without changing the buffer's
text.
* Write a documentation string for this command which describes
the special commands available in this mode. `C-h m'
(`describe-mode') will print this.
The documentation string may include the special documentation
substrings, `\[COMMAND]', `\{KEYMAP}', and `\<KEYMAP>', that
enable the documentation to adapt automatically to the user's
own key bindings. The `describe-mode' function replaces these
special documentation substrings with their current meanings.
*Note Accessing Documentation::.
* The major mode command should set the variable `major-mode' to
the major mode command symbol. This is how `describe-mode'
discovers which documentation to print.
* The major mode command should set the variable `mode-name' to
the "pretty" name of the mode, as a string. This appears in the
mode line.
* Since all global names are in the same name space, all the
global variables, constants, and functions that are part of the
mode should have names that start with the major mode name (or
with an abbreviation of it if the name is long).
* The major mode should usually have its own keymap, which is used
as the local keymap in all buffers in that mode. The major mode
function should call `use-local-map' to install this local map.
*Note Global and Local Keymaps::, for more information.
This keymap should be kept in a global variable named
`MODENAME-mode-map'. This variable is usually set up when the
library that defines the mode is loaded. Use `defvar' to set
the variable, so that it is not reinitialized if it already has
a value. (Such reinitialization could discard customizations
made by the user.)
* The mode may have its own syntax table or may share one with
other related modes. If it has its own syntax table, it should
store this in a variable named `MODENAME-mode-syntax-table'.
The reasons for this are the same as for using a keymap
variable. *Note Syntax Tables::.
* The mode may have its own abbrev table or may share one with
other related modes. If it has its own abbrev table, it should
store this in a variable named `MODENAME-mode-abbrev-table'.
*Note Abbrev Tables::.
* To give a variable a buffer-local binding, use
`make-local-variable' in the major mode command, not
`make-variable-buffer-local'. The latter function would make
the variable local to every buffer in which it is subsequently
set, which would affect buffers that do not use this mode. It
is undesirable for a mode to have such global effects. *Note
Buffer-Local Variables::.
* If hooks are appropriate for the mode, the major mode command
should run the hooks after completing all other initialization
so the user may further customize any of the settings. *Note
Hooks::.
* If this mode is appropriate only for specially-prepared text,
then the major mode command symbol should have a property named
`mode-class' with value `special', put on as follows:
(put 'funny-mode 'mode-class 'special)
This tells Emacs that new buffers created while the current
buffer has Funny mode should not inherit Funny mode. Modes such
as Dired, Rmail, and Buffer List use this feature.
* If it is desirable that Emacs use the new mode by default after
visiting files with certain recognizable names, add an element
to `auto-mode-alist' to select the mode for those file names.
If you define the mode command to autoload, you should add this
element at the same time. Otherwise, it is sufficient to add
the element in the file that contains the mode definition.
*Note Auto Major Mode::.
* In the documentation, you should provide a sample `autoload'
form and a sample `auto-mode-alist' addition that users can
include in their `.emacs' files.
* The top level forms in the file defining the mode should be
written so that they may be evaluated more than once without
adverse consequences. Even if you never load the file more than
once, someone else will.
File: elisp, Node: Example Major Modes, Next: Auto Major Mode, Prev: Major Mode Conventions, Up: Major Modes
Major Mode Examples
-------------------
Text mode is perhaps the simplest mode besides Fundamental mode.
Here are excerpts from `text-mode.el' that illustrate many of the
conventions listed above:
;; Create mode-specific tables.
(defvar text-mode-syntax-table nil
"Syntax table used while in text mode.")
(if text-mode-syntax-table
() ; Do not change the table if it is already set up.
(setq text-mode-syntax-table (make-syntax-table))
(set-syntax-table text-mode-syntax-table)
(modify-syntax-entry ?\" ". " text-mode-syntax-table)
(modify-syntax-entry ?\\ ". " text-mode-syntax-table)
(modify-syntax-entry ?' "w " text-mode-syntax-table))
(defvar text-mode-abbrev-table nil
"Abbrev table used while in text mode.")
(define-abbrev-table 'text-mode-abbrev-table ())
(defvar text-mode-map nil "") ; Create a mode-specific keymap.
(if text-mode-map
() ; Do not change the keymap if it is already set up.
(setq text-mode-map (make-sparse-keymap))
(define-key text-mode-map "\t" 'tab-to-tab-stop)
(define-key text-mode-map "\es" 'center-line)
(define-key text-mode-map "\eS" 'center-paragraph))
Here is the complete major mode function definition for Text mode:
(defun text-mode ()
"Major mode for editing text intended for humans to read.
Special commands: \\{text-mode-map}
Turning on text-mode calls the value of the variable text-mode-hook,
if that value is non-nil."
(interactive)
(kill-all-local-variables)
(use-local-map text-mode-map) ; This provides the local keymap.
(setq mode-name "Text") ; This name goes into the mode line.
(setq major-mode 'text-mode) ; This is how `describe-mode'
; finds the doc string to print.
(setq local-abbrev-table text-mode-abbrev-table)
(set-syntax-table text-mode-syntax-table)
(run-hooks 'text-mode-hook)) ; Finally, this permits the user to
; customize the mode with a hook.
The three Lisp modes (Lisp mode, Emacs Lisp mode, and Lisp
Interaction mode) have more features than Text mode and the code is
correspondingly more complicated. Here are excerpts from
`lisp-mode.el' that illustrate how these modes are written.
;; Create mode-specific table variables.
(defvar lisp-mode-syntax-table nil "")
(defvar emacs-lisp-mode-syntax-table nil "")
(defvar lisp-mode-abbrev-table nil "")
(if (not emacs-lisp-mode-syntax-table) ; Do not change the table
; if it is already set.
(let ((i 0))
(setq emacs-lisp-mode-syntax-table (make-syntax-table))
;; Set syntax of chars up to 0 to class of chars that are
;; part of symbol names but not words.
;; (The number 0 is `48' in the ASCII character set.)
(while (< i ?0)
(modify-syntax-entry i "_ " emacs-lisp-mode-syntax-table)
(setq i (1+ i)))
...
;; Set the syntax for other characters.
(modify-syntax-entry ? " " emacs-lisp-mode-syntax-table)
(modify-syntax-entry ?\t " " emacs-lisp-mode-syntax-table)
...
(modify-syntax-entry ?\( "() " emacs-lisp-mode-syntax-table)
(modify-syntax-entry ?\) ")( " emacs-lisp-mode-syntax-table)
...))
;; Create an abbrev table for lisp-mode.
(define-abbrev-table 'lisp-mode-abbrev-table ())
Much code is shared among the three Lisp modes; the code is all in
one library. The following function sets various variables; it is
called by each of the major Lisp mode functions:
(defun lisp-mode-variables (lisp-syntax)
;; The `lisp-syntax' argument is `nil' in Emacs Lisp mode,
;; and `t' in the other two Lisp modes.
(cond (lisp-syntax
(if (not lisp-mode-syntax-table)
;; The Emacs Lisp mode syntax table always exists, but
;; the Lisp Mode syntax table is created the first time a
;; mode that needs it is called. This is to save space.
(progn (setq lisp-mode-syntax-table
(copy-syntax-table emacs-lisp-mode-syntax-table))
;; Change some entries for Lisp mode.
(modify-syntax-entry ?\| "\" "
lisp-mode-syntax-table)
(modify-syntax-entry ?\[ "_ "
lisp-mode-syntax-table)
(modify-syntax-entry ?\] "_ "
lisp-mode-syntax-table)))
(set-syntax-table lisp-mode-syntax-table)))
(setq local-abbrev-table lisp-mode-abbrev-table)
...)
Functions such as `forward-word' use the value of the
`paragraph-start' variable. Since Lisp code is different from
ordinary text, the `paragraph-start' variable needs to be set
specially to handle Lisp. Also, comments are indented in a special
fashion in Lisp and the Lisp modes need their own mode-specific
`comment-indent-hook'. The code to set these variables is the rest
of `lisp-mode-variables'.
(make-local-variable 'paragraph-start)
(setq paragraph-start (concat "^$\\|" page-delimiter))
...
(make-local-variable 'comment-indent-hook)
(setq comment-indent-hook 'lisp-comment-indent))
Each of the different Lisp modes has a slightly different keymap.
For example, Lisp mode binds `C-c C-l' to `run-lisp', but the other
Lisp modes do not. However, all Lisp modes have some commands in
common. The following function adds these common commands to a given
keymap.
(defun lisp-mode-commands (map)
(define-key map "\e\C-q" 'indent-sexp)
(define-key map "\177" 'backward-delete-char-untabify)
(define-key map "\t" 'lisp-indent-line))
Here is an example of using `lisp-mode-commands' to initialize a
keymap, as part of the code for Emacs Lisp mode. First `defvar' is
used to declare a mode-specific keymap variable. Then `boundp' tests
whether the `emacs-lisp-mode-map' variable has a value (is not void).
If the variable does have a value, we do not change it. This lets
the user customize the keymap if he or she so wishes. Otherwise, we
initialize it to a new sparse keymap and install the default key
bindings.
(defvar emacs-lisp-mode-map () "")
(if emacs-lisp-mode-map
()
(setq emacs-lisp-mode-map (make-sparse-keymap))
(define-key emacs-lisp-mode-map "\e\C-x" 'eval-defun)
(lisp-mode-commands emacs-lisp-mode-map))
Finally, here is the complete major mode function definition for
Emacs Lisp mode.
(defun emacs-lisp-mode ()
"Major mode for editing Lisp code to run in Emacs.
Commands:
Delete converts tabs to spaces as it moves back.
Blank lines separate paragraphs. Semicolons start comments.
\\{emacs-lisp-mode-map}
Entry to this mode calls the value of emacs-lisp-mode-hook
if that value is non-nil."
(interactive)
(kill-all-local-variables)
(use-local-map emacs-lisp-mode-map) ; This provides the local keymap.
(set-syntax-table emacs-lisp-mode-syntax-table)
(setq major-mode 'emacs-lisp-mode) ; This is how `describe-mode'
; finds out what to describe.
(setq mode-name "Emacs-Lisp") ; This goes into the mode line.
(lisp-mode-variables nil) ; This define various variables.
(run-hooks 'emacs-lisp-mode-hook)) ; This permits the user to use a
; hook to customize the mode.
File: elisp, Node: Auto Major Mode, Next: Mode Help, Prev: Example Major Modes, Up: Major Modes
How Emacs Chooses a Major Mode Automatically
--------------------------------------------
Based on information in the file name or in the file itself, Emacs
automatically selects a major mode for the new buffer when a file is
visited.
* Command: fundamental-mode
Fundamental mode is a major mode that is not specialized for
anything in particular. Other major modes are defined in effect
by comparison with this one--their definitions say what to
change, starting from Fundamental mode. The `fundamental-mode'
function does *not* run any hooks, so it is not readily
customizable.
* Command: normal-mode &optional FIND-FILE
This function establishes the proper major mode and local
variable bindings for the current buffer. First it calls
`set-auto-mode', then it runs `hack-local-variables' to parse,
and bind or evaluate as appropriate, any local variables.
If the FIND-FILE argument to `normal-mode' is non-`nil',
`normal-mode' assumes that the `find-file' function is calling
it. In this case, if `inhibit-local-variables' is non-`nil', it
asks for confirmation before processing a local variables list.
If you run `normal-mode' yourself, the argument FIND-FILE is
normally `nil', so confirmation is not requested.
`normal-mode' uses `condition-case' around the call to the major
mode function, so errors are caught and reported as a `File mode
specification error', followed by the original error message.
* Function: set-auto-mode
This function selects the major mode that is appropriate for the
current buffer. It may base its decision on the value of the
`-*-' line, on the visited file name (using `auto-mode-alist'),
or on the value of a local variable). However, this function
does not look for the `mode:' local variable near the end of a
file; the `hack-local-variables' function does that. *Note :
(emacs)Choosing Modes.
* User Option: default-major-mode
This variable holds the default major mode for new buffers. The
standard value is `fundamental-mode'.
If the value of `default-major-mode' is `nil', Emacs uses the
(previously) current buffer's major mode for major mode of a new
buffer. However, if the major mode symbol has a `mode-class'
property with value `special', then it is not used for new
buffers; Fundamental mode is used instead. The modes that have
this property are those such as Dired and Rmail that are useful
only with text that has been specially prepared.
* Variable: initial-major-mode
The value of this variable determines the major mode of the
initial `*scratch*' buffer. The value should be a symbol that
is a major mode command name. The default value is
`lisp-interaction-mode'.
* Variable: auto-mode-alist
This variable contains an association list of file name patterns
(regular expressions; *note Regular Expressions::.) and
corresponding major mode functions. Usually, the file name
patterns test for suffixes, such as `.el' and `.c', but this
need not be the case. Each element of the alist looks like
`(REGEXP . MODE-FUNCTION)'.
For example,
(("^/tmp/fol/" . text-mode)
("\\.texinfo$" . texinfo-mode)
("\\.texi$" . texinfo-mode)
("\\.el$" . emacs-lisp-mode)
("\\.c$" . c-mode)
("\\.h$" . c-mode)
...)
When you visit a file whose *full* path name matches a REGEXP,
`set-auto-mode' calls the corresponding MODE-FUNCTION. This
feature enables Emacs to select the proper major mode for most
files.
Here is an example of how to prepend several pattern pairs to an
existing `auto-mode-alist'. (You might use this sort of
expression in your `.emacs' file.)
(setq auto-mode-alist
(append
'(("/\\.[^/]*$" . fundamental-mode) ; Filename starts with a dot.
("[^\\./]*$" . fundamental-mode) ; Filename has no dot.
("\\.C$" . c++-mode))
auto-mode-alist))
* Function: hack-local-variables &optional FORCE
This function parses, and binds or evaluates as appropriate, any
local variables for the current buffer.
If the variable `inhibit-local-variables' is non-`nil', and
FORCE is `nil', then the user is asked for confirmation if the
buffer does contain local variable specifications. A non-`nil'
value of FORCE is passed by `normal-mode' when it is called
explicitly by the user.
*Note : (emacs)File variables, for the syntax of the local
variables section of a file.
* User Option: inhibit-local-variables
When this variable is non-`nil', `hack-local-variables' asks the
user for confirmation before obeying a file's local-variables
list.
File: elisp, Node: Mode Help, Prev: Auto Major Mode, Up: Major Modes
Getting Help about a Major Mode
-------------------------------
The `describe-mode' function is used to provide information about
major modes. It is normally called with `C-h m'. The
`describe-mode' function uses the value of `major-mode', which is why
every major mode function needs to set the `major-mode' variable.
* Command: describe-mode
This function displays the documentation of the current major
mode.
The `describe-mode' function calls the `documentation' function
using the value of `major-mode' as an argument. Thus, it
displays the documentation string of the major mode function.
(*Note Accessing Documentation::.)
* Variable: major-mode
This variable holds the symbol for the current buffer's major
mode. This symbol should be the name of the function that is
called to initialize the mode. The `describe-mode' function
uses the documentation string of this symbol as the
documentation of the major mode.